﻿Public Class V_AsientoBE
    Private _anomes As String
    Private _codasn As String
    Private _nroasn As String
    Private _registro As String
    Private _codcta As String
    Private _codgas As String
    Private _coduga As String
    Private _codanl As String
    Private _codaux As String
    Private _fchemi As Date
    Private _codtdc As String
    Private _nrodoc As String
    Private _reflin As String
    Private _diaven As Integer
    Private _debmna As Decimal
    Private _habmna As Decimal
    Private _debmex As Decimal
    Private _habmex As Decimal
    Private _montca As Decimal
    Private _fchasn As Date
    Private _creusr As String
    Private _crefec As DateTime
    Private _registros As String
    Private _montotal As Decimal
    Private _desglo As String

    Public Property anomes() As String
        Get
            Return _anomes
        End Get
        Set(ByVal value As String)
            _anomes = value
        End Set
    End Property

    Public Property codasn() As String
        Get
            Return _codasn
        End Get
        Set(ByVal value As String)
            _codasn = value
        End Set
    End Property

    Public Property nroasn() As String
        Get
            Return _nroasn
        End Get
        Set(ByVal value As String)
            _nroasn = value
        End Set
    End Property

    Public Property registro() As String
        Get
            Return _registro
        End Get
        Set(ByVal value As String)
            _registro = value
        End Set
    End Property

    Public Property codcta() As String
        Get
            Return _codcta
        End Get
        Set(ByVal value As String)
            _codcta = value
        End Set
    End Property

    Public Property codgas() As String
        Get
            Return _codgas
        End Get
        Set(ByVal value As String)
            _codgas = value
        End Set
    End Property

    Public Property coduga() As String
        Get
            Return _coduga
        End Get
        Set(ByVal value As String)
            _coduga = value
        End Set
    End Property

    Public Property codanl() As String
        Get
            Return _codanl
        End Get
        Set(ByVal value As String)
            _codanl = value
        End Set
    End Property

    Public Property codaux() As String
        Get
            Return _codaux
        End Get
        Set(ByVal value As String)
            _codaux = value
        End Set
    End Property

    Public Property fchemi() As Date
        Get
            Return _fchemi
        End Get
        Set(ByVal value As Date)
            _fchemi = value
        End Set
    End Property

    Public Property codtdc() As String
        Get
            Return _codtdc
        End Get
        Set(ByVal value As String)
            _codtdc = value
        End Set
    End Property

    Public Property nrodoc() As String
        Get
            Return _nrodoc
        End Get
        Set(ByVal value As String)
            _nrodoc = value
        End Set
    End Property

    Public Property reflin() As String
        Get
            Return _reflin
        End Get
        Set(ByVal value As String)
            _reflin = value
        End Set
    End Property

    Public Property diaven() As Integer
        Get
            Return _diaven
        End Get
        Set(ByVal value As Integer)
            _diaven = value
        End Set
    End Property

    Public Property debmna As Decimal
        Get
            Return _debmna
        End Get
        Set(value As Decimal)
            If _debmna = value Then
                Return
            End If
            _debmna = value
        End Set
    End Property

    Public Property habmna As Decimal
        Get
            Return _habmna
        End Get
        Set(value As Decimal)
            If _habmna = value Then
                Return
            End If
            _habmna = value
        End Set
    End Property

    Public Property debmex As Decimal
        Get
            Return _debmex
        End Get
        Set(value As Decimal)
            If _debmex = value Then
                Return
            End If
            _debmex = value
        End Set
    End Property

    Public Property habmex As Decimal
        Get
            Return _habmex
        End Get
        Set(value As Decimal)
            If _habmex = value Then
                Return
            End If
            _habmex = value
        End Set
    End Property

    Public Property montca As Decimal
        Get
            Return _montca
        End Get
        Set(value As Decimal)
            If _montca = value Then
                Return
            End If
            _montca = value
        End Set
    End Property

    Public Property fchasn() As Date
        Get
            Return _fchasn
        End Get
        Set(ByVal value As Date)
            _fchasn = value
        End Set
    End Property

    Public Property creusr As String
        Get
            Return _creusr
        End Get
        Set(value As String)
            If _creusr = value Then
                Return
            End If
            _creusr = value
        End Set
    End Property

    Public Property crefec As DateTime
        Get
            Return _crefec
        End Get
        Set(value As DateTime)
            If _crefec = value Then
                Return
            End If
            _crefec = value
        End Set
    End Property

    Public Property registros() As String
        Get
            Return _registros
        End Get
        Set(ByVal value As String)
            _registros = value
        End Set
    End Property

    Public Property montotal As Decimal
        Get
            Return _montotal
        End Get
        Set(value As Decimal)
            If _montotal = value Then
                Return
            End If
            _montotal = value
        End Set
    End Property

    Public Property desglo As String
        Get
            Return _desglo
        End Get
        Set(value As String)
            If _desglo = value Then
                Return
            End If
            _desglo = value
        End Set
    End Property

End Class
